object MainFrm: TMainFrm
  Left = 349
  Top = 199
  Width = 1233
  Height = 404
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = 'MainFrm'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  Scaled = False
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Sp: TSplitter
    Left = 453
    Top = 0
    Height = 358
    Align = alRight
  end
  object sb: TStatusBar
    Left = 0
    Top = 358
    Width = 1225
    Height = 19
    Panels = <
      item
        Text = #30001#20110#21508#31181#23433#20840#21355#22763#20250#35823#35748#26412#31243#24207#20026#21202#32034#30149#27602#65292#25925#24314#35758#23558#23433#20840#36719#20214#20851#38381#21518#20877#36816#34892
        Width = 200
      end>
  end
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 453
    Height = 358
    Align = alClient
    Caption = #28304#36873#25321
    TabOrder = 1
    object Label1: TLabel
      Left = 16
      Top = 24
      Width = 96
      Height = 12
      Caption = #36873#25321#35201#25195#25551#30340#30424#31526
    end
    object Label2: TLabel
      Left = 16
      Top = 191
      Width = 252
      Height = 12
      Caption = #36873#25321#35201#25195#25551#30340#25991#20214#31867#22411'('#35831#20351#29992#21322#35282#20998#21495#20570#20998#38548')'
    end
    object Label3: TLabel
      Left = 16
      Top = 240
      Width = 252
      Height = 12
      Caption = #36755#20986#30446#24405#36873#25321'('#22914#26524#22312#25195#25551#30340#30424#31526#20869#20250#33258#21160#25490#38500')'
    end
    object Gauge: TGauge
      Left = 16
      Top = 317
      Width = 409
      Height = 25
      Progress = 0
    end
    object cbDrivers: TCheckListBox
      Left = 16
      Top = 44
      Width = 217
      Height = 135
      ItemHeight = 12
      Items.Strings = (
        'C'
        'D')
      TabOrder = 0
    end
    object edtFileExt: TEdit
      Left = 16
      Top = 208
      Width = 409
      Height = 20
      TabOrder = 1
      Text = 'txt;xls;doc;xlsx;docx;et;wps'
    end
    object edtDir: TEdit
      Left = 16
      Top = 256
      Width = 378
      Height = 20
      TabOrder = 2
    end
    object cbDel: TCheckBox
      Left = 17
      Top = 288
      Width = 145
      Height = 17
      Caption = #22797#21046#21518#21024#38500#28304#25991#20214
      TabOrder = 3
    end
    object btnProc: TButton
      Left = 264
      Top = 44
      Width = 153
      Height = 33
      Caption = #24320#22987#22788#29702
      TabOrder = 4
      OnClick = btnProcClick
    end
    object btnExit: TButton
      Left = 264
      Top = 92
      Width = 153
      Height = 33
      Caption = #36864#20986
      TabOrder = 5
      OnClick = btnExitClick
    end
    object btnDir: TButton
      Left = 399
      Top = 255
      Width = 25
      Height = 25
      Caption = '...'
      TabOrder = 6
      OnClick = btnDirClick
    end
    object cbDebug: TCheckBox
      Left = 296
      Top = 152
      Width = 97
      Height = 17
      Caption = 'debug'
      TabOrder = 7
      OnClick = cbDebugClick
    end
  end
  object grid: TDBGrid
    Left = 456
    Top = 0
    Width = 769
    Height = 358
    Align = alRight
    DataSource = dsfiles
    TabOrder = 2
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'fileName'
        Width = 181
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'fileDriver'
        Width = 72
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'fileDir'
        Width = 461
        Visible = True
      end>
  end
  object dsfiles: TDataSource
    DataSet = cdsFiles
    Left = 616
    Top = 264
  end
  object cdsFiles: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 584
    Top = 264
    object cdsFilesfileName: TStringField
      DisplayLabel = #25991#20214#21517#31216
      DisplayWidth = 200
      FieldName = 'fileName'
      Size = 64
    end
    object cdsFilesfileDir: TStringField
      DisplayLabel = #25152#22312#36335#24452
      DisplayWidth = 2000
      FieldName = 'fileDir'
      Size = 128
    end
    object cdsFilesfileDriver: TStringField
      DisplayLabel = #25152#22312#30424#31526
      FieldName = 'fileDriver'
    end
  end
end
